ratings <- readRDS(file = "data/movieratings.Rds") str(ratings)
## tibble [3,000 × 6] (S3: tbl_df/tbl/data.frame) ## $ userId : int [1:3000] 15 15 15 15 15 15 15 15 15 15 ... ## $ movieId : int [1:3000] 1 32 47 50 110 150 260 296 318 356 ... ## $ rating : num [1:3000] 2 4 5 5 3 3 5 5 2 1 ... ## $ timestamp: int [1:3000] 997938310 997938466 1054449816 997938500 1040205792 997939380 997938437 997938771 997938727 1058250631 ... ## $ title : chr [1:3000] "Toy Story" "Twelve Monkeys" "Seven" "Usual Suspects, The" ... ## $ genres : Factor w/ 902 levels "(no genres listed)",..: 329 887 889 743 271 453 118 609 700 649 ...